<% pid=Request.Querystring("ascid") Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "asc2000","","" Set rs = Conn.Execute("SELECT * FROM abstracts2002 WHERE id =" & pid & " ") %> <%=rs("ptitle")%> - Second Astrobiology Science Conference | The Astrobiology Web - Your Online Guide to the Living Universe
The Astrobiology Web · About Us · Advertising · Comments <% datToday = Date() intThisYear = Year(datToday) intThisMonth = Month(datToday) intThisDay = Day(datToday) strMonthName = MonthName(intThisMonth) strWeekDayName = WeekDayName (WeekDay(datToday)) %> <% = strWeekDayName %>, <%= strMonthName %> <% = intThisDay %>, <%= intThisYear %>    
 
.
.

<%=rs("ptitle")%>

Primary Author: <%=rs("first")%> <%=rs("last")%><%if rs("method")="PLENARY" then%>, <%=rs("affiliation")%><%else%><%if rs("Affiliation1")="" then%><%else%>, <%=rs("Affiliation1")%><%end if%><%end if%>
Presentation Type: <%if rs("method")="ORAL" then%>Oral Presentation<%end if%><%if rs("method")="PLENARY" then%>Plenary Presentation<%end if%><%if rs("method")="POSTER" then%>Poster Presentation<%end if%>
<%If rs("method")="POSTER" then%><%else%>Session: <%=rs("session")%><%end if%>

<%=rs("abstract")%>

<%If trim(rs("AuthorF2"))="" then%><%else%> Secondary Authors:

<%=rs("AuthorF2")%> <%=rs("AuthorL2")%> <%if rs("affiliation2")="" then%><%else%> <%=rs("affiliation2")%>
<%end if%> <%if rs("AuthorF3")="" then%><%else%> <%=rs("AuthorF3")%> <%=rs("AuthorL3")%> <%if rs("affiliation3")="" then%><%else%>  <%=rs("affiliation3")%>
<%end if%><%end if%> <%if rs("AuthorF4")="" then%><%else%> <%=rs("AuthorF4")%> <%=rs("AuthorL4")%> <%if rs("affiliation4")="" then%><%else%>  <%=rs("affiliation4")%>
<%end if%><%end if%> <%if rs("AuthorF5")="" then%><%else%> <%=rs("AuthorF5")%> <%=rs("AuthorL5")%> <%if rs("affiliation5")="" then%><%else%>  <%=rs("affiliation5")%>
<%end if%><%end if%> <%if rs("AuthorF6")="" then%><%else%> <%=rs("AuthorF6")%> <%=rs("AuthorL6")%> <%if rs("affiliation6")="" then%><%else%>  <%=rs("affiliation6")%>
<%end if%><%end if%> <%end if%>

[TOP]

<% rs.close set rs = nothing Conn.Close set Conn = nothing %>